

Public Class frmExam


    Private Sub frmLogin_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        txtUserName.Text = "http://skyizblue.myid.net/"
        txtUserKey.Text = "UserKey"
        txtURL.Text = "http://api.springnote.com/pages/1.xml/"

    End Sub

    Private Sub btnGet_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGet.Click

        objSpringnote = New Springnote(Trim(txtUserName.Text), Trim(txtUserKey.Text))
        lblContent.Text = objSpringnote.Getpage(Trim(txtURL.Text))

    End Sub
End Class
